machine = Unlisp::Machine.new
machine.machine_eval ["do",
  ["def", "x", "1"],
  ["+", "x", "x"]
]